home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 001 / pibtscr4.arc / NORTH.SCR < prev    next >
Encoding:
Text File  |  1986-01-08  |  640 b   |  30 lines
  1. PARAM TT=X
  2. PARAM TE=2
  3. PARAM MO=20
  4. CLEAR
  5. MESSAGE "***** DIALING NORTHPARKS IHCS *****"
  6. DIAL "19"
  7. IF NOT CONNECTED
  8.    MESSAGE      "***** RE-DIALING NORTHPARKS IHCS *****"
  9.    HANGUP
  10.    REDIAL
  11. ENDIF
  12. CLEAR
  13. WAITSTRING "Name ->"
  14. STEXT "      |"
  15. WAITSTRING "-->"
  16. STEXT "    |"
  17. WAITSTRING "Password -->"
  18. STEXT "      |"
  19. WAITSTRING "Enter Your Choice ---->"
  20. stext "F|"
  21. waitstring "Choice ->"
  22. stext "C|"
  23. waitstring "Choice ? ->"
  24. stext "A|"
  25. waitstring "Your Choice ->"
  26. stext "L|"
  27. IF CONNECTED
  28.    EXIT
  29. ENDIF
  30.